(use gauche.parseopt)

(define (main args)
  (let-args (cdr args)
      ((path-v "v|valuepath=s" "")
       (file   "f|file=s" #f)
       (else (option args continue)
	     (print option " " args)))))
	      
    
